TERSE Standard Glossary 
9/21/81 


This is a description of the TERSE vocabulary. The words are 
presented in ASCII order. The first line of each entry shows a 
symbolic description of the action of the word: Symbols indicating 
which parameters are to be placed on the stack before executing the 

word, 3 dashes (-) indicating execution, then any parameters left on 

the stack by the word. In this notation, the top of the stack is to 
the right. If the place of the word in the input string is not 
completely obvious, it is shown explicitly. If no dashes are shown 
the word does not affect the stack. Symbols are used as follows: 


b 

c 

f 

m n p q r 
nnnn pppp 
ssss 


Block number 

7-bit ASCII character code 
Flag: OrFalse, non-zero=True. 
flag return 0 or 1. 

16-bit integers 
The name of a word 
A string of characters 


All words which return a 


Immediately following the name of a word, certain characters may 
appear within paraentheses. These denote some special action or 
characteristics: 


C The word may be used only within a colon-definition. A 
following digit (CO or C2) indicates the number of memory 
cells used when the word is compiled if other than one. A 
following + or - sign indicates that the word either pushes 
or pops a value on the stack during compilation. (This 
action is not related to its action during execution.) 

E The word may not normally be compiled within a colon-definition. 

P The word has its immediate bit set; it is executed directly, 

even when encountered during compile mode. 

U The word applies to a user variable (in a multi-user system each 
user would have his own copy.) 

X The word is cross-compilable. 

G GAS Terse only 

Unless stated otherwise, all references to numbers apply 16-bit 
integers, with the most significant bit as the sign bit and the 
negative in two’s complement form. Similarly, all arithmetic will be 
assuned to be 16-bit signed integer arithmetic with error and overflow 
indication unspecified. 








Page 2 


TERSE 81 Glossary 


Standard Definitions 

! (X) m p - 

Store m at address p. 

#DRVS (X) -p 

Returns the a ddress — of a variah 1 A_-r>on+Rul i ng . the number of 
drives in your system. 

' (P) * nnnn — p 

Leave address of verb nnnn on stack. A compiler directive, ' 
is executed when encountered in a colon definition; the 
address of the following word's code field is found 
immediately (at compilation) and stored in the dictionary 
(after the address of LIT) as a literal to be placed on the 
stack at execution time. Within a colon definition, ' nnnn 
is identical to: LIT [ ' nnnn , ] 

( (P) ( ssss) 

Ingore a comment that will be delimited by a right 
parentheses. CAUTION: No imbedded right parentheses, and no 
leading or trailing space is required. 

* (X) m n-p 

16-bit signed multiply. p=m*n 

+ (X) m n-q 

16-bit integer addition. q=m+n 

+! (X) m p - 

Add integer m to value at address p. 

+B! (X) m p - 

Add the low-order 8 bits of m to the byte at address p. 

+BLOCK m-b 

Return the sun of m plus the number of the block currently 
being interpreted. 

+LOOP (C,X) m - 

Add m to the loop index. Exit from the loop is made when the 
resulant index reaches or passes the limit, if m is greater 
than zero; or when the index is less than (passes) the limit, 
if m is less than zero. 

, (X) m - 

Store m into the next available dictionary word, advancing 
the dictionary pointer. 

(X) ssss" 

Stores a message delimited by " at the next available 
dictionary location with the length of the message being the 
first byte. 

(X) m n-q 

16-bit integer subtraction: q=m-n 
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-! (X) m p - 

Subtract integer m from the value at address p. 

—> (P) 

(Pronounced "next block") Continue interpretation with the 
next block (Equivalent to 1 +BLOCK CONTINUED). When used in 
the last block of a file, a ;S will be executed. 

->L (X) m p-n 

Double-precision logical shift right on m for p bits with the 
value returned as n. See also <-L ( Shift left ). 

-DUP (X) m - m (if zero) 

m — m m (non-zero) 

Duplicate the top value on the stack if it is not zero. Used 
with IF to avoid the need for an ELSE with a DROP. 

. m- 

Print the value on the stack as an integer, converted 
according to the current number base. 

." (P) ." ssss" 

Transmit a message delimited by a " to the selected output 
device. 

. BLK# 

Causes block number of each screen to be printed out as it is 
loaded. 

.HOU 

Change output device to HOUSTON INSTRUMENTS printer. This 
output routine should run any standard printer. 

.LIST 

Change output device to printer. 

.NBLK# 

Turns off the .BLK# option. 

.NLIST 

Change output device to CRT. 

.NSCR 

Turns off the .SCR option. 

.SCR 

Causes each screen to be listed out as it is loaded. 

/ (X) m n-q 

16-bit signed integer divide, q=m/n. The quotient is 
truncated and the remainder is lost. (Actually defined as 
/MOD DROP) 

/MOD (X) m n-r q 

16-bit integer divide, m/n. The quotient is left on top of 
the stack, the remainder beneath. The remainder has the sign 
of the quotient, q. 
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0 

0 < 

0 <> 

0 <= 

0<FRAME 

0 = 

0 > 

0 >= 

0FRAME> 

1 

1 + 

1 + ! 

1+B! 

1 - 

1 -! 

1-B! 

KFRAME 

1FRAME> 

1LOCALS 


(X) -n 

Puts a 0 on the stack. (0 is a CONSTANT) 

(X) m-f 

True if m is negative. 

(X) m-f 

True if m is not equal to 0. 

(X) m-f 

True if m is negative or equal to 0. 

(X) 

See <FRAME for a complete description. 

(X) m-f 

True if m is zero. 

(X) m-f 

True if m is positive and non-zero. 

(X) m-f 

True if m is positive or equal to 0. 

(X) 

See FRAME> for a complete description. 

(X) -n 

Puts a 1 on the stack. (1 is a CONSTANT) 

(X) m-q 

q=m+1 

(X) p- 

Add 1 to the contents of the word at location p. 

(X) p- 

Add 1 to the contents of the byte at location p. 

(X) m — q 

q=m-1 

(X) p- 

Subtract 1 from the contents of the word at location p. 
(X) p- 

Subtract 1 from the contents of the byte at location p. 
(X) 

See <FRAME for a complete description. 

(X) 

See FRAME> for a complete description. 

(X) 

See LOCAL for a complete description. 
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1LOCAL 

1PARAM@ 

1PARAM 

2 * 

2 + 

2 - 

2 / 

2<FRAME 

2FRAME> 

2DR0P 

2DUP 

2L0CAL@ 

2L0CAL 

2PARAM@ 

2PARAM 

2SWAP 

3<FRAME 

3FRAME> 

3LOCAL@ 


Glossary 


(X) 

See LOCAL for a complete description. 

(X) 

See PARAM for a complete description. 

(X) 

See PARAM for a complete description.' 

(X) m-q 

q=m*2 (Shift left) 

(X) m-q 

q=m+2 (Increment by 2) 

(X) m-q 

q=m-2 (Decrement by 2) 

(X) m-q 

q=m/2 (Shift Right) 

(X) 

See <FRAME for a complete description. 

(X) 

See FRAME> for a complete description. 

(X) m n - 

Drop the top two values from the stack ( to drop a double 
precision nunber for example). 

(X) m n-m n m n 

Duplicate the top two values on the stack. 

(X) 

See LOCAL for a complete description. 

(X) 

See LOCAL for a complete description. 

(X) 

See PARAM for a complete description. 

(X) 

See PARAM for a complete description. 

(X) m n p q — p q m n 

Swap two pairs of values (e.g. double-precision numbers). 

(X) 

See <FRAME for a complete description. 

(X) 

See FRAME> for a complete description. 

(X) 

See LOCAL for a complete description. 
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3L0CAL (X) 

See LOCAL for a complete description. 

3PARAM@ (X) 

See PARAM for a complete description. 

3PARAM (X) 

See PARAM for a complete description. 

4<FRAME (X) 

See <FRAME for a complete description. 

4FRAME> (X) 

See FRAME> for a complete description. 

4LOCALS (X) 

See LOCAL for a complete description. 

4L0CAL (X) 

See LOCAL for a complete description. 

4PARAM0 (X) 

See PARAM for a complete description. 

4PARAM (X) 

See PARAM for a complete description. 

: (X) : nnnn 

Create a dictionary entry defining nnnn as equivalent to the 
following sequence of TERSE words. Set STATE to compile mode. 
(Extension: Set the context vocabulary equivalent to the 
current vocabulary). 

; (C,P,X) 

Terminate a colon-definition and set STATE to immediate mode. 
;S (E) 

Stop interpretation of a symbolic block. 

< (X) m n — f 

True if m<n 

<-L (X) m n-p 

Logical double-precision shift left on m for n bits with the 
value returned as p. See also ->L ( logical shift right ). 

« (E) m n — 

Use: m n « verbs » 

Similar to a DO...LOOP except that these are conditionals 
that may be employed during interpretation, although they are 
much slower. In conjuction with the words [ and ] they may 
be used within a colon definition to control compilation, 
although they are not compiled. These words can be nested. 

<= (X) m n — f 

True if m<n or m=n 
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<> 

<FORK 


<FRAME 


<STK 


<STKD 

<STKH 


> 

>= 

» 

>R 

? 

?BELL 

€ 


(X) m n-f 

True if m is unequal to n 

(X) n <F0RK ppppl pppp2...ppppn FORK> 

Execute the nth verb following <F0RK and remove n from the 
stack. Execution resumes with the verb following FORK>. All 
verbs are skipped if n is greater than the nunber of verbs 
between <F0RK and F0RK>. Numeric literals. 

(X) n- 

Create a stack frame with n local values. All previous 

values that are on the stack can be accessed using the 

various PARAM verbs ( see PARAM ). All local values pushed / ^ _ 

on the stack can also be accessed using the various LOCAL 

verbs ( see LOCAL ). The stack frame can be cleared using 

the various FRAME> verbs ( see FRAME> ). In addition, the 

following <FRAME verbs are available: KFRAME, 2<FRAME, 

3<FRAME, and 4<FRAME. 

(X) 

Marks the top of the stack at compilation time. Usually used 
to detect whether there are an unbalanced nunber of 
IF-ELSE-THENs, etc. Should be used in conjuntion with STK>. 

See also <STKD and <STKH. 


(X) 

Executes the <STK and the DECIMAL verbs. 
(X) 

Executes the <STK and the HEX verbs. 


(X) 


m 

n ■ 

— f 

True 

if 

m=n 



(X) 


m 

n ■ 

— f 

True 

if 

m>n 



(X) 


m 

n ■ 

— f 

True 

if 

m>n 

or 

m=n 


(E) 

Terminate a conditional interpretation sequence begun by «. 
(C,X) m - 

Push m onto top of the return stack. ( See R> ) 

p — 

Print the value contained at address p according to the 
current base. 

(X) 

Transmits a <?><BELLXCRXLF> to the selected output device. 

(X) p-q 

Return the word at location p. 
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A" (X) A" ssss" - q 

Makes a string similarly to but does not type it. Instead 
A" returns the string address q. The string may be typed by 
COUNT TYPE or STYPE. 

A= (X) m A= nnnn 

See ARRAY for a complete description 

ABORT (X) m - 

Enter the Abort sequence, reset the stack and the return 
stack. Then print the message at m, execute ?BELL, and 
return control to the terminal. This can be used in 
conjunction with A" . 

ABS (X) m-q 

Leave the absolute value of a number. 

AND (X) m n-q 

Bitwise logical AND of m and n. 

ARRAY (X) m ARRAY nnnn 

Define an array named nnnn and allocate m uninitialized words 
of RAM). The sequence i nnnn will return the address of the 
i-th word on the stack. The index should be in the range 0 
<= i <= m-1, but no check is made for values exceeding this 
range. 

ASM (P) 

Switch the context pointer so that dictionary searches will 
begin at the Assembler Vocabulary. A CODE define 
automatically switches the CONTEXT to ASM. 

B! (X) m p - 

Store the least significant 8 bits of m at byte-address p. 

B, (X) m - 

Store the low 8 bits of m into the next available dictionary 
byte, advancing the dictionary pointer. 

B: m-q 

q=m+308. Used for calculating block numbers of drive B. 

B@ (X) p-q 

Return the 8-bit value q found at byte-address p. 

BA= (X) m BA= nnnn 

See BARRAY for a complete description. 

BARRAY (X) m BARRAY nnnn 

Define an array named nnnn and allocate m uninitialized bytes 
of RAM). The sequence i nnnn will leave the address of the 
i-th byte on the stack. The index should be in the range 0 
<= i <= m-1, but no check is made for values exceeding this 
range. 
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END can be used conveniently to end the loop on a TRUE value 
or to go back to BEGIN on FALSE. Both WHILE and END drop the 
value they test. 


ssary q 

BELL 

Sends a BELL ( 0?H ) to the terminal. 


BIT! 


BIT@ 


(X) 


f in n — 


ILGI L-G_LII_1IIG. 


G LifT'tfilL- 


Stores-hit value f ( 0 or 1 ) into bit m at address n. 


(X) m n —- ft *4 J 

Returns the Will of bit’m ( 0 or (T)) 3ft address n. 


BIT-CALC (X) 


j § 7 


r == rf- £2 ; 

- - m rr ----- m n 




Returns a bit mask, m, _and and the address, n. for bit m at 
address n. Used by BIT§ and BIT!. ^ ' ' 


i GJJG' L-J. L-J. y = -1 - - - HniLH H-rHIii 15 GG5G 1110 iOQD Will 

be nvQD (Y'i • ■ ■ ggggugggggg gv WHILE 1-3 TRUE 

TrarwGtsrj" Backspace 08H ) to “ther Selected output- 

device. 


I 

| 

I 

1 



BLK/DISK (X) - P = «*» •* 

T ReturnsihhGnumheGdf i Mocks.TJerGis^r ni r^ 

vc BLK/SIDE (X,G) -p 

Returns the number of blocks on one side of a disk. 


BLK (U) -n 

A variable containing the number of the block being listed or 
edited. This variable is not used in the file system. 


ifetj 


BLKMGVE (X) p q n - 

Move the n blocks starting at block p into the n blocks 
starting - at GlocI<^-p into-Trite h^HTocRs^stertirg. at block q. 
Overlapping areas may be used. This works for physical 
blocks only. 


=71 fi 77- 2=f1fl7-=7 


f f=r>. hi t 


BLKSHIFT 


II = 17 = = = 
rieeee 7 r-££ 


: G-er 7 =7 7 er-e 7: .= § ± 

‘ “ 5 ' “““ m n q- 

Shift blocks m thru n by the amount q. The block will be 
located at m+a thru n+q, This works for physical blocks 

7 GIG i 7 GG GIIG GGGtfG L_GG GG^GGll 


■ 

I 


I 


= 

I 
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BLOCK 

b-p 

Leave the first address of Block b. If the block is not 
already in memory, it is .transferred from disk into whichever 
core buffer has been least recently accessed. If the block 
occupying that buffer has been updated, it is FLUSHed ( See 
FLUSH ) before Block b is read into the buffer. 

BMOVE 

(X) p q n - 

Move the n bytes starting at byte-address p into the n 
byte-cells starting at byte-address q. The contents of p is 
moved first. 

BONE 

(X) p- 

Set the word at location p to 1. 

BPTR 

— n 

A variable containing a pointer to the most recently used 
disk block buffer. Disk block buffers are headed by a link 
to the next block and the block number followed by the data. 
A link of 0 indicates the end of the chain. 

BR= 

(X) m BR= nnnn 

See BRAMALLOT for a complete dexcription. 


BRAMALLOT (X) m BRAMALLOT nnnn 



Allocate m contiguous bytes of RAM such that when nnnn is 
executed, the address of the beginning of the RAM is 
returned. 

BTABLE 

(X) BTABLE nnnn 

Define the beginning of a table of bytes. The values to be 
entered into the table must follow the definitions of the 
table. The sequence i nnnn will leave the address of the i-th 
byte on the stack. The index should be 0 <r i < 
number-of-table-entries. No check is made on the range of i. 

BUFFER 

b-p 

Obtain a core buffer for Block b, leaving the first buffer 
cell address. The block is not read from disk, and is 
automatically marked as updated. 

BUFFER1 

(X) — p 

Returns the address of the first disk buffer. 

BUFFER2 

(X) — p 

Returns the address of the second disk buffer. 

BV= 

(X) BVr nnnn 

Executes a 0 BVARIABLE. 


BVARIABLE (X) m BVARIABLE nnnn 

Create a word nnn which when executed will push the address 
of an 8 bit variable (initialized to the low 8 bits of m) 
onto the stack. 


BYE 


Exit to ICE or GAS monitor 
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BZERO (X) p - 

Set the byte at location p to 0. 

C= (X) m C= nnnn 

See CONSTANT for a complete description. 

CASE (X) (C2+,P) m n-(m) 

m n CASE <action for m=n> ELSE <drop> THEN 
If m equals n, drop both m and n and execute the words 
directly following CASE until the next ELSE or THEN ; 
otherwise, drop n but leave m and execute the words after 
ELSE (or THEN if no ELSE is used). The selection of one of 
many cases can be done by: 

m nl CASE <action for m=n1> ELSE 
n2 CASE <action for m=n2> ELSE 
n3 CASE <action for m=n2> ELSE 

otherwise action> THEN THEN THEN 
(m will still be on the stack in the otherwise section). 

CCALC m-q 

Converts a link address m to the code address q of that 
routine. 

CODE (X) CODE nnnn 

Create a dictionary entry defining nnnn as equivalent to the 
following sequence of assembler cpde. (Extension: set the 
context vocabulary to Assembler.) (fa , . AjgtfC) 

COM (X) m-q 

Complement each bit of m (Leave one's complement). 

CONSTANT (X) m CONSTANT nnnn 

Create a word which when executed pushes m onto the stack. 

S ince Lire - "COrrsb ont 11 value nr m avbc -mo dified bv the -sequence q 

* nFTnrr-3 — t — ! It is bFtenMmes _ advantageo us to define a 

variable—as- a consta nt, nartieularv -if rt^ jis^accessed more 
than it is modified. 

CONTEXT (U) -p 

Return the address of a variable containing a pointer to the 
vocabulary in which dictionary searches are to begin. See 
CURRENT. 

CONTINUED (E) b - 

Continue interpretation at block b. (The preferred 
implementation in multi-buffer systems is such that the block 
buffer currently being accessed will be used for storage of 
block b, leaving other buffers unaffected.) 

m n — 

Copies block m to block n. This works for physical blocks 
only. 

(X) p — m n 

Leave byte-address m and byte-count n of a message string 
beginning at word-address p. It is presuned that the first 
byte at p contains the byte-count and that the actual message 
starts with the second byte in location p. Typically, COUNT 


COPY 

COUNT 
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is followed by WRITE or TYPE 


CR 

Transmit a <CRXLF> to the selected output device. 

CURRENT (U) 

A variable containing a pointer to the vocabulary into which 
new words are to be entered. CURRENT @ @ leaves the link 

address of the next entry to be defined. 

CYL (X) -m 

Returns the address of a system variable containing the 
currently selected track/cylinder. 

CYL/DISK (X) m 

Returns the nunber of tracks/cylinders per disk. 

DATA (X) DATA nnnn 

Define the beginning of a set of data. The values to be used 
must be following the definition of the data (, and B, are 
used to store the values). When nnnn is executed it will 
leave the address of the first byte of data on the top of the 
stack. 

DEBUG 

Switch in the DEBUG vocabulary. 

DECIMAL 

Set the nuneric conversion base to decimal mode. 

DED 

Executes the DECIMAL and EDIT verbs. 

DEFINITIONS 

Set CURRENT equal to CONTEXT. See CURRENT, CONTEXT and 
VOCABULARY. 

DIR m n - 

Lists the first line of each block that starts with "(" from 
block n to block m-1. 

DISKCOPY 

Copys all blocks from disk drive A to drive B. 

DLIST 

Lists the context vocabulary verbs with their link field and 
code field addresses. Repeated pressings of the space bar 
continue the listing. 

DLIT (C) DLIT 1 h 

Automatically compiled before each double precision literal 
encourkered in a _£§lon definition. Execution of DLf*! causes 
the contents of the"hext 2 instruction^^ords to be pushed 
onto the stackC High valtte-is-'Cff top. 
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DO (C,X) m n - 

Begin a loop, to be terminated by LOOP or +LOOP. The loop 
index begins at n, and may be modified at the end of the loop 
by any positive or negative value. The loop is terminated 
when an increment index reaches or exceeds m, or when a 
decremented index becomes less than m. Within nested loops, 
the word I always returns the index of the innermost loop 
that is being executed, while J returns the index of the next 
outer loop, and K returns the index of the second outer loop. 

DP -q 

A variable containing a pointer to the next available 
dictionary location. 

DP+! n - 

Add the signed value n to the dictionary pointer (DP). As DP 
may be an internal register rather than a VARIABLE, it is 
accessible only through HERE and DP+! 

DRIVE (X) -p 

Returns the address of a system variable containing the 
currently selected drive. 

DROP (X) m - 

Drop the top value from the stack. 

DUMP m - 

Lists 64 bytes in hex format starting at address m on the 
output device. Repeated pressings of the space key causes the 
next 64 bytes to be listed. Press any other key to exit. 

DUP (X) m-m m 

Duplicate the top value on the stack. 

E-C 

Marks all block-buffers as empty. Updated blocks are not 
flushed. Contents of buffers are undefined. 

EDIT (P) 

Brings in the EDIT vocabulary, thereby making its verbs 
accessible. ( ie. CONTEXT is set to EDIT ). 

ELSE (C2,P,X) 

Precede the false part of an IF...ELSE...THEN conditional. 
It may be ommitted if the false part is empty. 

END (C2-,P,X) f - 

Mark the end of a BEGIN..END loop. If f is true the loop is 
terminated. If f is false, control returns to the first word 
after the corresponding BEGIN. 

EX 

See FLUSH for complete details. 

EXEC q - 

Depending on the STATE variable either q is stored in the 
dictionary or address q is loaded into HL and a PCHL is done. 
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FCALC 

FCALC nnnn -p 

Returns the code address of verb nnnn. 


FILECOPY m n - 

Copies blocks n thru m inclusive from drive A to drive B. 



This works for physical blocks only. 

FILES 

Informs the system that you are working with files and not 
with physical blocks. See NOFILES. 

FIX 

FIX nnnn 

Allows you to redefine verb nnnn in the dictionary and have 
all higher level verbs use the new definition. 

FLD 

— p 

A variable containing the field length reserved for a number 
during output conversion. 

FLOAD 

FLOAD nnnn 

LOADs file nnnn into memory. 

FLUSH 

Write all blocks that have benn flagged as "updated" to disk. 
Return when output is done. ( See UPDATE ) 

FORGET 

FORGET nnnn 

Delete all verbs after and including nnnn. Frees up memory 
and deletes verbs from dictionary. Should not be used for 
verbs in the basic system. 

FORK> 

(X) 

See <FORK 

FRAME> 

(X) n- 

Removes the current stack frame that was set up by <FRAME. 
This includes popping all local values and n previous values. 
See <FRAME for a complete description. 

FSLD 

FSLD nnnn 

Load the system from a file named nnnn. 

FSYSAVE 

FSYSAVE nnnn 

Save the entire dictionary as binary data into the file named 
nnnn. To reload the system, see FSLD. 

GET 

— p 

Return the address of a variable containing the address of 
the character input routine. 

GETC 

— n 

Inputs an ASCII character n from the selected input device. 

H. 

m — 

Convert and output in hexadecimal mode, unsigned, and 
preceded by a blank. BASE is unchanged. Format 
specifications are observed. 
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HABORT 

(X) m- 

Just like ABORT except the string at HERE is displayed. 

HELP 

(E) 

List the dictionary. This starts with the CONTEXT vocabulary. 

HERE 

(U) -p 

Return the address of the next available dictionary location. 

HEX 

Switch the nuneric conversion base to hexadecimal. 

HEXLIST 

m b- 

List the ASCII contents and hexadecimal contents of block b 
starting at byte m on the selected output device. This works 
for physical blocks only. 

HEXSHOW 

b — 

Lists ASCII contents and hexadecimal contents of block b on 
the selected output device. Repeated pressings of the space 
bar on the control terminal will list the next 16 bytes of 
the block. A <CR> will begin listing at the next physical 
block, and pressing any other key will terminate the 
sequence. This works for physical blocks only. 

I 

(C,X) -m 

Returns the index of an intermost DO-loop. 

1+ 

(X) m — q 

Adds m to the index of the intermost DO-loop. q=m+I 

ICE 

Enter the ICEbox monitor. Can be used to debug machine code 
routines. 

IF 

(C2+,P,X) f IF Ctrue part> ELSE <false part> THEN 
f IF Ctrue part> THEN 

IF s the first word of a conditional. If f is true, the 
words following IF are executed and the words following ELSE 
are not executed. The ELSE part of the conditional is 
optional. If f is false, words between IF and ELSE, of 
between IF and THEN when no ELSE is used, are skipped. 
IF-ELSE-THEN conditionals may be nested. 

IFEND 

(E) 

Terminate a conditional interpretation sequence begun by 
IFTRUE. 

IFTRUE 

(E) f IFTRUE...OTHERWISE..rIFEND- 

Unlike IF..ELSE..THEN, these conditionals may be employed 
during interpretation. In conduction with the words [ and ] 
they may be used within a colon definition to control 
compilation, although they are not to be compiled. These 
words cannot be nested. 

IMMED 

Mark the most recently made dictionary entry such that when 
encountered at compile time it will be executed rather than 
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compiled. 

INP 

(X) m-n 

Inputs from port m returning value n. 

J 

(C,X) -m 

Within a nested DO-loop, return the .index of the next outer 
loop. 

J+ 

(X) m-q 

Adds m to DO-loop index J. q=m+J 

K 

(C,X) -m 

Within a nested DO-loop, return the index of the second outer 
loop. 

K+ 

(X) m-q 

Adds m to DO-loop index K. q=m+K 

LAST 

-p 

A variable containing the compilation address of the most 
recently created dictionary entry. 

LEAVE 

(C,X) 

Force termination of a DO-loop at the next opportunity by 
setting the loop limit equal to the current value of the 
index. The index itself remains unchanged, and execution 
proceeds normally until LOOP or +L00P is encountered. 

LINE 

m-p 

Leave the word address of the begininning of line m for the 
block whose nunber is contained at BLK. (For editing purposes 
a block is divided into 16 lines, nunbered 0-15, of 64 
characters.) 


LINELOAD m b - 

Begin interpreting at line m of Block b. (0 <= m <= 15) This 



works for both physical blocks and files ( where m is the 
relative block nunber if you are working with files ). 

LIST 

b — 

List ASCII symbolic contents of block b on the selected 
output device. This works for physical blocks only. 

LIT 

(C) LIT m 

Automatically compiled before each literal encountered in a 
colon definition. Execution of LIT causes the contents of 
the next dictionary cell to be pushed onto the stack. 

LITERAL 

n* — 

Store n in the dictionary (as 2 wordsrLIT n). Does nothing if 
STATE is set to compile mode. If DPREC=0 then m is dropped 
else 3 words are compiled: DLIT n m. 

LITES 

(G) m- 

Sets the beginning value for the LEDs on the GAS. 
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LOAD 

LOCAL 


LOOP 

MAP 

MAX 

MEMAP@ 

MEMAP! 

MIN 

MINUS 

MOD 

MOVE 

NAND 

NEXT 

NEWVOCAB 


b- 

Begin interpreting at block b. The block must terminate its 
own interpretation with ;S , —> or CONTINUED. 

(X) n-q 

Returns the address, q, of the nth local value on the stack 
created by the current stack frame ( see <FRAME ). When n=1, 
the address of the first local value* pushed on the stack is 
returned. In addition, the following LOCAL verbs are 
available: 1 LOCAL, 2L0CAL, 3L0CAL, and 4L0CAL. To get the 
actual local values instead of the stack addresses, the 
following LOCAL verbs are available: 1L0CAL@, 2LOCAL0, 
3L0CAL@, and 4LOCAL0. To use local variables, create a stack 
frame using <FRAME, then execute an m nLOCAL !. 

(C,X) 

Increment the DO-loop index by one, terminating the loop if 
the new index is equal to or greater than the limit. 


Maps out the EDIT and ASM vocabularies and maps in the Screen 
RAM. Must be executed before using screen ram. 

(X) m n-p 

Leave the greater of the two numbers. 

(G) -m 

Returns the current value of the memory map. 

(G) m- 

Sets the current memory map to m, but does not do any 
mapping. 

(X) m n-p 

Leave the lesser of the two numbers. 

(X) m-m 

Negate a nunber by taking its two's complement. 

(X) m n — r 

Leave the remainder of m/n, with the same sign as m. 

(X) pqn- 

Move the contents of n memory cells beginning at address p 
into n cells beginning at address q. The contents of p is 
moved first; overlapping of data can occur. 

(X) m n — q 

Logical AND followed by COMplement. 

(X) (Oft, (09^ 

End of -cgde; terminate a'-eeete definition. 

Create a new vocabulary nnnn and append it to the other 
vocabularies. 
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NOFILES 

Informs the operating system that you will be referring to 
physical blocks and not to files. 

NOR 

(X) m n-q 

Logical OR followed by COMplement. 

NOT 

(X) m-f 

Equivalent to 0= 

OK 

Prints a <CR> and "OK" on the output device. 

ONE 

(X) p- 

Sets the word at location p to 1. 

OR 

(X) m n-q 

Bitwise logical inclusive OR of m and n. 


OTHERWISE (E) 



An interpreter-level conditional word. See IFTRUE. 

OUTP 

(X) m n - 

Outputs byte-value m to output port n. The high byte of n 
goes out on the upper address lines for sub-port numbers. 

OVER 

(X) m n-m n m 

Push the second stack value. 

PAGE 

Clears the terminal screen or performs an action suitable to 
the output device currently active. 

PARAMO 

(X) 

See PARAM for a complete description. 

PARAM 

(X) n-q 

Returns the address, q, of the nth value on the stack that 
was there before the <FRAME verb was executed ( see <FRAME ). 
When n=1, the address of the top value that was on the stack 
will be returned. In addition, the following PARAM verbs are 
available: 1PARAM, 2PARAM, 3PARAM, and 4PARAM. To get the 
actual parameter values instead of the stack addresses, the 
following verbs are available: PARAM@, 1PARAM§, 2PARAM§, 
3PARAM@, and 4PARAM@. 

PDSTAT 

(X) — m 

Returns the Disk Status Port number. 

PDDATA 

(X) — m 

Returns the Disk Data Port nunber. 

PDCMD 

(X) — m 

Returns the Disk Command Port number. 

PDTRK 

(X) — m 

Returns the Disk Track Select Port number. 
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PDSECT 

(X) -m 

Returns the Disk Sector Select Port number. 

PDSEL 

(X) -m 

Returns the Disk Select Port number. 

PICK 

(X) n-q 

Return the nth value on the stack(2 
PICK is equivalent to OVER). [ Pick =- O F* 

PIMODE 

(X) -m 

ICE port number for interrupts. 

PLDATA 

(X) -m 

Returns the List Data Port number ( Printer Data Port ). 

PLSTAT 

(X) — m 

Returns the List Status Port number ( Printer Status Port ). 

POLLC 

— n 

Inputs an ASCII charactern from the selected input device, n 
will be zero if a character is not ready. 


PRINTOUT m n - 

Lists ASCII contents of blocks n upto but not including m on 



selected output device. Only blocks starting with "(" are 
listed. The listing is prefaced by a DIR listing. 

PROT 

Turns on write-protection circuits in the ICEbox. Makes it 
impossible to write to locations below 4000H. 

PTDATA 

(X) -m 

Returns the Terminal Data Port number. 

PTSTAT 

(X) — m 

Returns the Terminal Status Port number. 

PUT 

A variable containing the address of the put character output 
routine. 

PUTC 

n — 

Outputs ASCII character n to the selected output device. 

R= 

m R= nnnn 

See RAMALLOT for a complete description. 

R> 

(C,X) — n 

Pop the value from the return stack and push it onto the user 
stack. See >R. 


RAMALLOT m RAMALLOT nnnn - 

Allocate m contiguous words of RAM such that when nnnn is 
executed the beginning address of the RAM will be pushed on 
the stack. 
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RAMLEN 

-n 

Returns a value which is the amount of variable space used 
since the last RAMMARK verb was executed. 

RAMMARK 

Remembers the next available variable location ( VARHERE ). 
Ususally used in conjunction with .RAMLEN to determine the 
amount of variable space used. 

REPEAT 

(C2-,P,X) 

Effect an unconditional jump back to the beginning of a 
BEGIN..WHILE..REPEAT loop. See BEGIN. 

REPLACE 

REPLACE nnnnl nnnn2 

Makes all uses of the old verb named nnnnl the same as the 
verb nnnn2. 

ROT 

(X) m n p-n p m 

Rotate the top three values on the stack, bringing the 
deepest to the top. 

RP@ 

(X) -p 

Return the address of the top of the return stack. 

S! 

(X) p m — 

Executes the SWAP and ! verbs ( ie. Stores m at address p ). 

SB! 

(X) p m - 

Executes the SWAP and B! verbs ( ie. Stores the least 
significant 8 bits of m at byte-address p ). 

SCR 

-q 

A variable whose value is the current block used for the 
input string being interpreted. 

SHCW 

b- 

List ASCII symbolic contents of block b on the selected 
output device. Repeated pressings of the space bar on the 
control terminal will list the next block in sequence. 
Pressing any other key will terminate the sequence. 

SEC/TRK 

(X) — m 

Returns the number of sectors on a track. 

SECTOR 

(X) — m 

Returns the address of a system variable containing the 
currently selected sector. 


SIDE/DISK (X,G) - m 



Returns the nunber of sides on the disk ( ie. 1 for 
single-sided disks ). 

SIDE 

(X,G) — m 

Returns the address of a system variable containing the 
currently selected side of the disk. 

SKIP 

(C,X) 

Skips the next word within a colon definition. Used with FIND 
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and NUMBER. 

SP§ (X) -p 

Return the address of the top of the stack, (e.g. 1 2 SP@ § 
. . . would type 221) 

SPACE 

Output a space character to the selected output device. 

SPACES n - 

Output n spaces to the selected output device. No action for 
n < 1. 


SPACES? p-m n 

Leaves starting address m and character count n of a message 
string beginning at address p. n is the length of the message 
after all trailing spaces have been subtracted starting at 
address p+63. 

STATE -q 

A variable whose value is set to compile mode or immediate 
mode. 


STK> (X) 

Checks the top of the stack to see if it was marked by the 
<STK, <STKD, or <STKH verbs; if not, a STACK PARITY ERROR is 
displayed. See <STK, <STKD, or <STKH for a complete 
description. 


STYPE 


SWAB 


SWAP 


Equivalent to COUNT TYPE. 

(X) m-n 

Exchange the high and low order bytes of value m. 


- 


t-arr- 




X) m n — n m 
xchange the top two stack 


s. 


si a me aaapa 


SYSAVE 


m 


Save the entire dictionary as binary data starting at block 
m. To restore the dictionary and boot the system, type: m 
LOADp, This works for physical blocksjsnl^^ . 


SYSCQPY 


neiftOr I DO 1 On, 




Copies blocks 1 thru 44 from disc drive A to drlve~ik^ 

ked by the , \ 

: (X; iABut niinn ifT 

Define the beginning oila table of words. The values to be 
entered into the table must follow ~thu definitions of the 
table. The sequence i nnnn will leave the address of the i-th 
word ^>n the stack. The index should be 0 <= i < 

nunber-of-table-entries. No check is made on the range of i. 

TERSE..: 


Brings in the TERSE vocabulary, thereby making all TERSE 
verbs accessible. ( ie. Sets CONTEX,GT to TERSE ) 


1 


i 

I 


r. i:~n =; : 
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THEN 

♦ 

(C0-,P,X) 

Terminate an IF..ELSE..THEN conditional sequence. 

TRACK 

(X) -p 

Returns the address of a variable containing the track number 
currently being accessed. 

TYPE 

m n- 

Send a string of n characters starting at byte address m to 
terminal. 

U! 

(X) m n - 

Stores value m into write protected location n and 
re-protects. 

U< 

(X) m n-f 

True if unsigned m<n. 

U<= 

(X) m n —f 

True if unsigned m<n or m=n. 

U> 

(X) m n-f 

True if unsigned m>n. 

U>= 

(X) m n — f 

True if unsigned m>n or m=n. 

UB! 

(X) m n - 

Stores byte value m into write protected location n and 
re-protects. 

UNMAP 

Maps in the EDIT, DEBUG and ASM vocabularies. The mapping is 
done automatically by verbs that need those vocabularies, and 
maps out the Screen RAM ( 4000H - 7FFFH ). 

UNPROT 

Makes it possible to write to locations below 4000h in colon 
definitions. 

UNX 

(X) 

Executes the UNMAP verb and disables interrupts. 

UPDATE 

Flag the most recently referenced block as updated. The 
block will subsequently be transferred automatically to disk 
should its buffer be required for storage of a different 
block. See FLUSH. 

V= 

(X) m V= nnnn 

Executes a 0 VARIABLE. 

VARHERE 

(X) -p 

Returns the address of the next available variable location. 


VARIABLE (X) m VARIABLE nnnn 

Create a word nnnn which when executed will push the address 
of a 16 bit variable (initialized to m) onto the stack. 
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VOCABULARY VOCABULARY nnnn 

Create a new vocabulary named nnnn that will append to the 
current vocabulary. Execution of nnnn will cause it to_ become 
the context vocabulary. See CURRENT, CONTEX'^Gj) and 
DEFINITIONS. 


VPTR -q 

A variable similar to DP that points to the next available 
variable location. Currently starts at EOOOh and progresses 
toward SP@. VPTR may be set by the user to a more useful 
location (i.e. COOOh in commercial mode). 

WHERE 

Output information about the status of TERSE after an error 
abort. Indicate at least the last word compiled and the last 
block accessed. 

WHILE (X) (C2+,P) f WHILE - 

Test the value on the stack and if FALSE exit out of a 
BEGIN. .WHILE..REPEAT loop. See BEGIN. 

XC? (X) -f 

False if Cross-Compiling; otherwise, True. 

XOR (X) m n-q 

Bitwise logical exclusive OR of m and n. 

XDI (X) 

Disables interrupts. 

ZERO (X) p - 

Set the word at location p to 0. 

[COMPILE] : nnnn ... [COMPILE] pppp ...; 

Forces the compilation of the immediate mode verb pppp. 

[ (P) 

Stop compilation. The words following the left bracket in a 
colon definition are executed, not compiled. 

[[ (E) 

Use: [[ .f ]] 

Similar to a BEGIN...END except that these are conditionals 
that may be employed during interpretation, although they are 
much slower. In conjunction with the verbs [ and ], they may 
be used within a colon definition to control compilation, 
although they are not compiled. These words may be nested. 

] (P) 

Start compilation. Following words are compiled into the 
dictionary. 

]] (E) f — 

Terminates a conditional interpretation sequence begun by [[. 

( 

Puts the value of CONTEXT on the return stack and sets the 
context vocabulary to TERSE. Used with }. 
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} 

Restores the context vocabulary to what it was before { 

{ 


See 


end of TERSE Glossary' 








